This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
Hi, I'm working with an ASCII char, space delimited file with this structure:
020401 160.3 ...
Code:
Type Rec
x As String *6 '# of ASCII Characters
y As String *12 'in the "field"
End Type
Sub Initialize
Dim filename As String
dim filenum As Integer
Dim lineIn As String
Dim thisRec As Rec
filename = "C:\SM.txt"
filenum= FreeFile()
Open filename For Random As filenum Len=Len(thisRec)
Get # filenum, ,thisRec
Print thisRec.x, thisrec.y
Close filenum
End Sub
Output:
믯タ〲〴‱† ††㘱⸰″†††㘱⸰‸†
I've tried reading the values as integers and/or single precision numbers, but that produces unexpected results, thus:
-17425 6.48253E-10
Any ideas where I can go with this? Well, other than the obvious...!
Thanks, Lee
Feedback number WEBB8TBPSK created by ~Kelly Pretumibergflar on 04/13/2012
Status: Open
Comments: